Profile of (eval 340)[Sub/Quote.pm:3]

Filename	(eval 340)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 26 statements in 226µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
16	2	1	129µs	311µs	JSON::Schema::Modern::_canonical_resources
1	1	1	14µs	35µs	JSON::Schema::Modern::::BEGIN@5.186 JSON::Schema::Modern::BEGIN@5.186
1	1	1	4µs	4µs	Method::Generate::Accessor::_Generated::BEGIN@10.187

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
3	1	1µs			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4					package JSON::Schema::Modern;
5	2	43µs	2	56µs	# spent 35µs (14+21) within JSON::Schema::Modern::BEGIN@5.186 which was called: # once (14µs+21µs) by Sub::Quote::_clean_eval at line 5 no warnings 'closure'; # spent 35µs making 1 call to JSON::Schema::Modern::BEGIN@5.186 # spent 21µs making 1 call to warnings::unimport
6					# spent 311µs (129+182) within JSON::Schema::Modern::_canonical_resources which was called 16 times, avg 19µs/call: # 9 times (76µs+113µs) by JSON::Schema::Modern::add_schema at line 169 of /Users/ether/git/JSON-Schema-Modern/lib/JSON/Schema/Modern.pm, avg 21µs/call # 7 times (53µs+69µs) by JSON::Schema::Modern::add_schema at line 173 of /Users/ether/git/JSON-Schema-Modern/lib/JSON/Schema/Modern.pm, avg 17µs/call sub _canonical_resources {
7					($_QUOTED,$_UNQUOTED) if 0;
8					# BEGIN quote_sub PRELUDE
9					package Method::Generate::Accessor::_Generated;
10					# spent 4µs within Method::Generate::Accessor::_Generated::BEGIN@10.187 which was called: # once (4µs+0s) by Sub::Quote::_clean_eval at line 15 BEGIN {
11	1	0s			$^H = 2018;
12	1	0s			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
13	1	3µs			%^H = (
14					);
15	1	37µs	1	4µs	} # spent 4µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@10.187
16					# END quote_sub PRELUDE
17	16	138µs	48	182µs	shift->_assert__resource_index->${\Data::Perl::Collection::Hash::MooseLike->can("values")}(@_); } # spent 101µs making 16 calls to Data::Perl::Role::Collection::Hash::values, avg 6µs/call # spent 51µs making 16 calls to JSON::Schema::Modern::_assert__resource_index, avg 3µs/call # spent 30µs making 16 calls to UNIVERSAL::can, avg 2µs/call
18	1	0s			$$_UNQUOTED = \&_canonical_resources;
19					}
20	1	4µs			1;
21
22					;